projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
bbcbfd6
)
(sh-while-getopts): Punctuate help message better.
author
Richard M. Stallman
<rms@gnu.org>
Mon, 15 Apr 1996 21:17:59 +0000
(21:17 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Mon, 15 Apr 1996 21:17:59 +0000
(21:17 +0000)
lisp/progmodes/sh-script.el
patch
|
blob
|
history
diff --git
a/lisp/progmodes/sh-script.el
b/lisp/progmodes/sh-script.el
index 0a7b387d06f154184b9891777fc268d6ad221a39..51923ee27952049ebdb40f2b3e4856d1d6396334 100644
(file)
--- a/
lisp/progmodes/sh-script.el
+++ b/
lisp/progmodes/sh-script.el
@@
-1297,12
+1297,12
@@
option followed by a colon `:' if the option accepts an argument."
";;" \n)
< "*)" \n
> "echo" " \"usage: " "`basename $0`"
- "
[
+-" '(setq v1 (point)) str
+ "
[
+-" '(setq v1 (point)) str
'(save-excursion
(while (search-backward ":" v1 t)
- (replace-match "
arg][
+-" t t)))
+ (replace-match "
ARG] [
+-" t t)))
(if (eq (preceding-char) ?-) -5)
- "]
[ --] args
\"" \n
+ "]
[--] ARGS...
\"" \n
"exit 2" \n
< < "esac" \n
< "done" \n